; Music of Mask (1987) (Gremlin Graphics)(Ben Daglish)
; Ripped by Megachur the 18/10/2008

	write "MASK.BIN"

music_date_rip	equ &12a8
music_adr	equ &f000
first_theme	equ 0   ; 0 -> 0
last_theme	equ 0

	read "music_header_v1_0.asm"

	jp lf6d5	; init music
	jp lf128	; play music
.lf006
	db #00,#09,#51,#7f,#0b,#02,#3f,#00
	db #0e,#00,#08,#81,#09,#0b,#02,#ff
	db #00,#0c,#0d,#08,#41,#5b,#8a,#04
	db #13,#00,#0f,#03,#08,#41,#09,#0b
	db #02,#55,#00,#0f,#00,#08,#11,#07
	db #0b,#02,#7f,#00,#0e,#00,#08,#00
	db #ed,#0b,#02,#7f,#00,#0a,#00,#08
	db #00,#06,#0b,#02,#7f,#08,#0d,#11
	db #08,#41,#0a,#0b,#02,#ff,#10,#0c
	db #00,#08,#21,#0a,#0b,#02,#7f,#10
	db #0c,#00,#08,#81,#2c,#0b,#02,#7f
.lf060 equ $ + 2
	db #00,#0a,#00,#09,#12,#1b,#24,#2d
	db #36,#3f,#00,#09,#12,#1b,#24,#2d
	db #36,#3f,#00,#09,#12,#1b,#24,#2d
	db #36,#3f,#00,#09,#12,#1b,#24,#2d
	db #36,#3f,#00,#09,#12,#1b,#24,#2d
	db #36,#3f,#00,#09,#12,#1b,#24,#2d
.lf091 equ $ + 3
.lf090 equ $ + 2
	db #36,#3f,#00,#b8,#0f,#00,#00,#00
.lf099 equ $ + 3
.lf097 equ $ + 1
.lf096
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf0b5 equ $ + 7
.lf0b4 equ $ + 6
.lf0b3 equ $ + 5
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf0c3 equ $ + 5
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf0c6
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf0e2 equ $ + 4
.lf0e1 equ $ + 3
.lf0e0 equ $ + 2
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf0f3 equ $ + 5
.lf0f0 equ $ + 2
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf10d equ $ + 7
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf10f equ $ + 1
.lf10e
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf11d equ $ + 7
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf123 equ $ + 5
.lf121 equ $ + 3
.lf11f equ $ + 1
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf126
	db #00
.lf127
	db #01
;
.play_music_interrupt
.lf128
;
	ex af,af'
	push af
	push bc
	push de
	push hl
	push ix
	push iy
	ld hl,lf127
	dec (hl)
	jr nz,lf13c
	ld (hl),#06
	call lf147
.lf13c
	pop iy
	pop ix
	pop hl
	pop de
	pop bc
	pop af
	ex af,af'
	ei
	ret
;
.play_music
.lf147
;
	ld hl,lf090
	ld a,(lf099)
	dec a
	jr nz,lf154
	ld (lf099),a
	inc (hl)
.lf154
	ld a,(lf0c6)
	dec a
	jr nz,lf15e
	ld (lf0c6),a
	inc (hl)
.lf15e
	ld a,(lf0f3)
	dec a
	jr nz,lf168
	ld (lf0f3),a
	inc (hl)
.lf168
	xor a
	ld (lf126),a
	ld ix,lf096
	ld (lf325),a
	ld hl,lf81e
	ld (lf260),hl
	ld (lf6f7),hl
	ld (lf70a),hl
	ld (lf728),hl
	ld de,(lf11d)
	call lf22e
	ld ix,lf0c3
	ld a,#01
	ld (lf126),a
	ld hl,lf861
	ld (lf260),hl
	ld (lf6f7),hl
	ld (lf70a),hl
	ld (lf728),hl
	ld a,#08
	ld (lf325),a
	ld de,(lf11f)
	call lf22e
	ld ix,lf0f0
	ld a,#02
	ld (lf126),a
	ld hl,lf87d
	ld (lf260),hl
	ld (lf6f7),hl
	ld (lf70a),hl
	ld (lf728),hl
	ld a,#10
	ld (lf325),a
	ld de,(lf121)
	call lf22e
	ld de,#c000
	ld hl,&f680
	ld a,(lf090)
	or a
	jr nz,lf225
	ld c,#00
	ld a,(lf0b3)
	call lfaed
	inc c
	ld a,(lf0b4)
	call lfaed
	inc c
	ld a,(lf0e0)
	call lfaed
	inc c
	ld a,(lf0e1)
	call lfaed
	inc c
	ld a,(lf10d)
	call lfaed
	inc c
	ld a,(lf10e)
	call lfaed
	inc c
	inc c
	ld a,(lf091)
	call lfaed
	inc c
	ld a,(lf0b5)
	call lfaed
	inc c
	ld a,(lf0e2)
	call lfaed
	inc c
	ld a,(lf10f)
	call lfaed
.lf225
	xor a
	ld (lf090),a
	ld c,#0e
	jp lfaed
.lf22e
	ld a,(ix+#03)
	or a
	jp nz,lf49f
	ld a,(ix+#11)
	cp #ff
	jr z,lf240
	ld (ix+#11),#00
.lf240
	ld l,(ix+#02)
	ld h,#00
	add hl,de
	ld a,(hl)
	cp #ff
	jr nz,lf2b7
	ld a,(ix+#04)
	or a
	jr z,lf25a
	dec (ix+#04)
	ld (ix+#02),#00
	jr lf240
.lf25a
	ld l,(ix+#00)
	ld h,#00
.lf260 equ $ + 1
	ld bc,lf81e
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
	cp #ff
	jp z,lf6d6
	bit 7,a
	jp z,lf294
	ld l,a
	and #1f
	ld (lf123),a
	ld a,l
	and #60
	srl a
	srl a
	srl a
	ld (lf284),a
.lf284 equ $ + 1
.lf283
	jr lf283
	jp lf704
	nop
	jp lf73b
	nop
	jp lf6f1
	nop
	jp lf717
.lf294
	ld c,a
	ld a,(lf126)
	add a
	ld e,a
	ld d,#00
	ld b,d
	ld hl,lf8cb
	add hl,bc
	ld a,(hl)
	ld hl,lf8e4
	add hl,bc
	ld b,(hl)
	ld hl,lf11d
	add hl,de
	ld (hl),a
	inc hl
	ld (hl),b
	ld e,a
	ld d,b
	ld (ix+#02),#00
	jp lf240
.lf2b7
	bit 7,a
	jp z,lf413
	cp #a0
	jr nz,lf2d9
	inc (ix+#02)
	call lf745
	ld (ix+#16),a
	ld (ix+#03),a
	inc (ix+#02)
	xor a
	ld (ix+#1d),a
	ld (ix+#1e),a
	jp lf4a8
.lf2d9
	cp #90
	jr c,lf322
	cp #c0
	jr c,lf30a
	ld (ix+#15),a
	and #1f
	ld (ix+#14),a
	inc (ix+#02)
	call lf745
	ld (ix+#12),a
	inc (ix+#02)
	call lf745
	ld (ix+#13),a
	inc (ix+#02)
	call lf745
	ld (ix+#11),a
	inc (ix+#02)
	jp lf240
.lf30a
	cp #bf
	jr nz,lf314
	ld (ix+#11),#00
	jr lf31c
.lf314
	and #0f
	add a
	add a
	add a
	ld (ix+#10),a
.lf31c
	inc (ix+#02)
	jp lf240
.lf322
	and #0f
.lf325 equ $ + 1
	add #00
	ld l,a
	ld h,#00
	ld bc,lf060
	add hl,bc
	ld l,(hl)
	ld h,#00
	ld bc,lf006
	add hl,bc
	push hl
	pop iy
	ld a,(iy+#08)
	ld (ix+#2b),a
	ld hl,lf091
	ld a,(lf126)
	or a
	jr nz,lf356
	res 3,(hl)
	set 0,(hl)
	bit 7,(iy+#02)
	jr nz,lf377
	set 3,(hl)
	res 0,(hl)
	jr lf377
.lf356
	dec a
	jr nz,lf369
	set 1,(hl)
	res 4,(hl)
	bit 7,(iy+#02)
	jr nz,lf377
	res 1,(hl)
	set 4,(hl)
	jr lf377
.lf369
	set 2,(hl)
	res 5,(hl)
	bit 7,(iy+#02)
	jr nz,lf377
	res 2,(hl)
	set 5,(hl)
.lf377
	ld (ix+#24),#0f
	ld (ix+#25),#01
	ld a,(iy+#03)
	push af
	and #f0
	jr z,lf3a5
	rrca
	rrca
	rrca
	rrca
	ld c,a
	ld b,#00
	ld hl,lfacd
	add hl,bc
	ld a,(hl)
	bit 7,a
	jr nz,lf39c
	ld (ix+#24),a
	jr lf3a5
.lf39c
	and #7f
	ld (ix+#25),a
	ld (ix+#24),#01
.lf3a5
	ld a,(iy+#04)
	and #f0
	rrca
	rrca
	rrca
	rrca
	ld (ix+#20),a
	ld (ix+#21),#0f
	ld (ix+#22),#01
	pop af
	and #0f
	jr z,lf3d8
	ld c,a
	ld b,#00
	ld hl,lfadd
	add hl,bc
	ld a,(hl)
	bit 7,(hl)
	jr nz,lf3cf
	ld (ix+#21),a
	jr lf3d8
.lf3cf
	and #7f
	ld (ix+#22),a
	ld (ix+#21),#01
.lf3d8
	ld (ix+#27),#0f
	ld (ix+#28),#01
	ld a,(iy+#04)
	and #0f
	jr z,lf401
	ld c,a
	ld b,#00
	ld hl,lfadd
	add hl,bc
	ld a,(hl)
	bit 7,a
	jr nz,lf3f8
	ld (ix+#27),a
	jr lf3d8
.lf3f8
	and #7f
	ld (ix+#28),a
	ld (ix+#27),#01
.lf401
	ld a,(iy+#05)
	ld (ix+#06),a
	ld a,(iy+#07)
	ld (ix+#0b),a
	inc (ix+#02)
	jp lf240
.lf413
	add #12
	add (ix+#01)
	ld c,a
	ld b,#00
	ld (ix+#1c),a
	ld hl,lf74e
	add hl,bc
	ld a,(hl)
	ld hl,lf7a2
	add hl,bc
	ld h,(hl)
	ld l,a
	ld c,(ix+#09)
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
	set 0,(ix+#2a)
	xor a
	ld (ix+#26),a
	ld (ix+#23),a
	ld (ix+#29),a
	ld (ix+#1f),a
	res 7,(ix+#25)
	res 7,(ix+#22)
	res 7,(ix+#28)
	ld l,(ix+#02)
	ld h,#00
	inc l
	add hl,de
	ld a,(hl)
	inc (ix+#02)
	inc (ix+#02)
	ex af,af'
	ld a,(ix+#0b)
	or a
	jr z,lf474
	ld l,a
	ld h,#00
	ld bc,lf7ee
	add hl,bc
	ld a,(hl)
	ld (ix+#0a),a
	ld (ix+#0c),#01
.lf474
	ld a,(ix+#10)
	or a
	jr z,lf492
	ld l,a
	ld h,#00
	ld bc,lf7fe
	add hl,bc
	ld a,(hl)
	and #78
	srl a
	srl a
	srl a
	inc a
	ld (ix+#18),a
	ld (ix+#17),#01
.lf492
	ld a,(ix+#15)
	and #1f
	ld (ix+#14),a
	ex af,af'
	ld (ix+#03),a
	ret
.lf49f
	cp (ix+#06)
	jr nz,lf4a8
	res 0,(ix+#2a)
.lf4a8
	ld a,(ix+#16)
	or a
	jr z,lf4b7
	dec (ix+#16)
	ret nz
	ld (ix+#03),#00
	ret
.lf4b7
	dec (ix+#03)
	ld a,(lf090)
	or a
	ret nz
	bit 0,(ix+#2a)
	jr z,lf529
	bit 7,(ix+#25)
	jr nz,lf4f6
	inc (ix+#26)
	ld a,(ix+#26)
	cp (ix+#25)
	jr nz,lf553
	ld (ix+#26),#00
	ld a,(ix+#24)
	add (ix+#1f)
	cp (ix+#2b)
	jr c,lf4f1
	ld a,(ix+#2b)
	ld (ix+#1f),a
	set 7,(ix+#25)
	jr lf553
.lf4f1
	ld (ix+#1f),a
	jr lf553
.lf4f6
	bit 7,(ix+#22)
	jr nz,lf553
	inc (ix+#23)
	ld a,(ix+#23)
	cp (ix+#22)
	jr nz,lf553
	ld (ix+#23),#00
	ld a,(ix+#1f)
	sub (ix+#21)
	jr nc,lf51f
.lf513
	ld a,(ix+#20)
	ld (ix+#1f),a
	set 7,(ix+#22)
	jr lf553
.lf51f
	cp (ix+#20)
	jr c,lf513
	ld (ix+#1f),a
	jr lf553
.lf529
	bit 7,(ix+#28)
	jr nz,lf553
	inc (ix+#29)
	ld a,(ix+#29)
	cp (ix+#28)
	jr nz,lf553
	ld (ix+#29),#00
	ld a,(ix+#1f)
	sub (ix+#27)
	jr nc,lf550
	ld (ix+#1f),#00
	set 7,(ix+#28)
	jr lf553
.lf550
	ld (ix+#1f),a
.lf553
	ld a,(ix+#0b)
	or a
	jp z,lf5de
	ld a,(ix+#0a)
	or a
	jr z,lf570
	bit 7,a
	jr z,lf56a
	and #7f
	jr z,lf5de
	jr lf570
.lf56a
	dec (ix+#0a)
	jp lf5de
.lf570
	ld a,(ix+#0c)
	and #7f
	add (ix+#0b)
	ld l,a
	ld h,#00
	ld bc,lf7ee
	add hl,bc
	ld a,(hl)
	ld (lf123),a
	bit 7,a
	jr z,lf5a3
	neg
	ld (lf123),a
	bit 7,(ix+#0c)
	jr nz,lf5af
.lf592
	ld hl,lf123
	ld a,(ix+#1d)
	sub (hl)
	ld (ix+#1d),a
	jr nc,lf5bd
	dec (ix+#1e)
	jr lf5bd
.lf5a3
	ld a,(lf123)
	ld (lf123),a
	bit 7,(ix+#0c)
	jr nz,lf592
.lf5af
	ld a,(lf123)
	add (ix+#1d)
	ld (ix+#1d),a
	jr nc,lf5bd
	inc (ix+#1e)
.lf5bd
	inc (ix+#0c)
	ld a,(ix+#0c)
	and #7f
	cp #08
	jr nz,lf5de
	ld a,(ix+#0c)
	xor #89
	ld (ix+#0c),a
	cp #01
	jr nz,lf5de
	ld a,(ix+#0a)
	or a
	jr z,lf5de
	dec (ix+#0a)
.lf5de
	ld a,(ix+#10)
	or a
	jp z,lf679
	dec (ix+#18)
	jp nz,lf679
	add (ix+#17)
	ld l,a
	ld h,#00
	ld bc,lf7fe
	add hl,bc
	ld a,(ix+#17)
	bit 7,a
	jr nz,lf658
	or a
	jr nz,lf60b
	ld a,(hl)
	and #38
	srl a
	srl a
	srl a
	or a
	jr nz,lf60c
.lf60b
	ld a,(hl)
.lf60c
	ld c,a
	and #07
	ld (ix+#18),a
	ld a,c
	and #f8
	srl a
	srl a
	srl a
	add (ix+#1c)
	ld c,a
	ld b,#00
	ld hl,lf74e
	add hl,bc
	ld a,(hl)
	ld hl,lf7a2
	add hl,bc
	ld h,(hl)
	ld l,a
	ld c,(ix+#09)
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
	inc (ix+#17)
	ld l,(ix+#10)
	ld h,#00
	ld bc,lf7fe
	add hl,bc
	ld a,(hl)
	and #07
	inc a
	cp (ix+#17)
	jr nz,lf679
	bit 7,(hl)
	ld a,#ff
	jr z,lf652
	xor a
.lf652
	ld (ix+#17),a
	jp lf679
.lf658
	cp #ff
	jr nz,lf679
	dec (ix+#17)
	ld c,(ix+#1c)
	ld b,#00
	ld hl,lf74e
	add hl,bc
	ld a,(hl)
	ld hl,lf7a2
	add hl,bc
	ld h,(hl)
	ld l,a
	ld c,(ix+#09)
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
.lf679
	ld a,(ix+#14)
	or a
	jr z,lf684
.lf680 equ $ + 1
	dec (ix+#14)
	jr lf6c9
.lf684
	ld a,(ix+#11)
	or a
	jr z,lf6c9
	cp #ff
	jr z,lf691
	dec (ix+#11)
.lf691
	ld a,(ix+#15)
	and #20
	jr z,lf6b1
	ld l,(ix+#1d)
	ld h,(ix+#1e)
	ld c,(ix+#12)
	ld b,(ix+#13)
	srl b
	rr c
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
	jr lf6c9
.lf6b1
	ld l,(ix+#1d)
	ld h,(ix+#1e)
	ld c,(ix+#12)
	ld b,(ix+#13)
	srl b
	rr c
	sbc hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
.lf6c9
	ret
	xor a
	ld (lf0b5),a
	ld (lf0e2),a
	ld (lf10f),a
	ret
;
.init_music
.lf6d5
;
	push af
.lf6d6
	ld hl,lf74d
	ld (lf11d),hl
	ld (lf11f),hl
	ld (lf121),hl
	ld hl,lf096
	ld de,lf097
	ld bc,#0086
	ld (hl),#00
	ldir
	pop af
	ret
.lf6f1
	ld l,(ix+#00)
	ld h,#00
.lf6f7 equ $ + 1
	ld bc,lf81e
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
	ld (ix+#09),a
	jp lf25a
.lf704
	ld l,(ix+#00)
	ld h,#00
.lf70a equ $ + 1
	ld bc,lf81e
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
	ld (ix+#01),a
	jp lf25a
.lf717
	ld a,(lf325)
	ld c,a
	ld a,(lf123)
	add c
	ld (lf730),a
	ld l,(ix+#00)
	ld h,#00
.lf728 equ $ + 1
	ld bc,lf81e
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
.lf730 equ $ + 1
	ld l,#00
	ld h,#00
	ld bc,lf060
	add hl,bc
	ld (hl),a
	jp lf25a
.lf73b
	ld a,(lf123)
	dec a
	ld (ix+#04),a
	jp lf25a
.lf745
	ld l,(ix+#02)
	ld h,#00
	add hl,de
	ld a,(hl)
	ret
.lf74e equ $ + 1
.lf74d
	db #ff,#ee,#18,#4d,#8e,#da,#2f,#8f
	db #f7,#68,#e1,#61,#e9,#77,#0c,#a7
	db #47,#ed,#98,#47,#fc,#d4,#70,#31
	db #f4,#dc,#86,#53,#24,#f6,#cc,#a4
	db #7e,#5a,#38,#18,#fa,#de,#c3,#aa
	db #92,#7b,#66,#52,#3f,#2d,#1c,#0c
	db #fd,#ef,#e1,#d5,#c9,#be,#b3,#a9
	db #9f,#96,#8e,#86,#7f,#77,#71,#6a
	db #64,#5f,#59,#54,#50,#4b,#47,#43
	db #3f,#3c,#38,#35,#32,#2f,#2d,#2a
.lf7a2 equ $ + 5
	db #28,#26,#24,#22,#20,#0e,#0e,#0d
	db #0c,#0b,#0b,#0a,#09,#09,#08,#08
	db #07,#07,#07,#06,#06,#05,#05,#05
	db #04,#04,#04,#04,#03,#03,#03,#03
	db #03,#02,#02,#02,#02,#02,#02,#02
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lf7ee equ $ + 1
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#01,#01,#ff,#ff,#00,#00
.lf7fe equ $ + 1
	db #00,#00,#00,#00,#00,#00,#00,#01
	db #ff,#89,#89,#00,#00,#00,#00,#00
	db #00,#8a,#19,#39,#61,#00,#00,#00
	db #00,#84,#21,#39,#61,#00,#00,#00
.lf81e equ $ + 1
	db #00,#a4,#00,#04,#b0,#07,#0c,#0c
	db #80,#02,#0c,#0c,#80,#ff,#0c,#0c
	db #80,#00,#0d,#0e,#80,#fd,#a3,#07
	db #80,#ff,#0c,#a3,#80,#00,#0c,#0e
	db #80,#fd,#a3,#07,#80,#ff,#0c,#a3
	db #80,#fd,#0c,#80,#00,#0e,#80,#fd
	db #a3,#07,#80,#ff,#0c,#a4,#80,#00
	db #0c,#a3,#80,#fd,#0c,#80,#00,#0e
.lf861 equ $ + 4
	db #80,#fd,#12,#ff,#01,#01,#02,#80
	db #fe,#01,#80,#00,#01,#01,#02,#80
	db #fe,#01,#80,#00,#05,#08,#09,#08
	db #0a,#0f,#a3,#e0,#48,#10,#11,#ff
.lf87d
	db #03,#03,#06,#e0,#48,#0b,#e5,#12
	db #0b,#e0,#51,#13,#e0,#2d,#14,#15
	db #13,#e0,#51,#14,#13,#16,#13,#e0
	db #2d,#15,#14,#e0,#09,#13,#e0,#12
	db #15,#16,#e0,#51,#13,#15,#e0,#12
	db #14,#e0,#09,#13,#e0,#12,#15,#16
	db #e0,#51,#13,#e0,#24,#15,#14,#e0
	db #09,#13,#e0,#12,#15,#16,#e0,#51
	db #13,#14,#e0,#24,#15,#16,#16,#18
	db #e0,#00,#17,#ff,#ff,#ff
.lf8cb
	db lf8fd,lf901,lf913,lf925
	db lf92d,lf94d,lf955,lf978
	db lf984,lf994,lf9a8,lf9be
	db lf9d9,lf9e5,lf9ef,lf9f9
	db lfa1d,lfa47,lfa65,lfa85
	db lfa8d,lfa95,lfa9d,lfaac
	db lfab6
.lf8e4
	db lf8fd/&100,lf901/&100,lf913/&100,lf925/&100
	db lf92d/&100,lf94d/&100,lf955/&100,lf978/&100
	db lf984/&100,lf994/&100,lf9a8/&100,lf9be/&100
	db lf9d9/&100,lf9e5/&100,lf9ef/&100,lf9f9/&100
	db lfa1d/&100,lfa47/&100,lfa65/&100,lfa85/&100
	db lfa8d/&100,lfa95/&100,lfa9d/&100,lfaac/&100
	db lfab6/&100
.lf901 equ $ + 4
.lf8fd
	db #82,#09,#a0,#ff,#84,#a0,#0a,#21
	db #0a,#23,#0a,#25,#0a,#28,#0a,#25
.lf913 equ $ + 6
	db #0a,#23,#0a,#21,#0a,#ff,#84,#a0
	db #0a,#1f,#0a,#23,#0a,#26,#0a,#2b
	db #0a,#26,#0a,#23,#0a,#1f,#0a,#ff
.lf925
	db #80,#93,#21,#a0,#1f,#a0,#90,#ff
.lf92d
	db #83,#09,#0a,#09,#0a,#07,#0a,#07
	db #0a,#04,#0a,#04,#0a,#07,#0a,#09
	db #14,#09,#0a,#07,#0a,#07,#0a,#04
	db #0a,#04,#0a,#07,#0a,#07,#0a,#ff
.lf94d
	db #85,#c0,#14,#00,#a0,#06,#a0,#ff
.lf955
	db #86,#06,#0a,#06,#0a,#81,#0d,#14
	db #86,#06,#0a,#06,#0a,#81,#0d,#0a
	db #86,#06,#14,#06,#0a,#81,#0d,#14
	db #86,#06,#0a,#81,#0d,#0a,#0d,#0a
.lf978 equ $ + 3
	db #0d,#0a,#ff,#83,#09,#0a,#09,#0a
.lf984 equ $ + 7
	db #81,#0d,#0a,#83,#09,#0a,#ff,#87
	db #a0,#14,#25,#1e,#23,#1e,#26,#1e
.lf994 equ $ + 7
	db #25,#1e,#23,#0a,#25,#0a,#ff,#87
	db #26,#0a,#26,#0a,#25,#1e,#26,#0a
	db #26,#0a,#25,#32,#26,#0a,#26,#0a
.lf9a8 equ $ + 3
	db #28,#14,#ff,#87,#26,#0a,#26,#0a
	db #25,#1e,#26,#0a,#26,#0a,#25,#1e
	db #23,#0a,#25,#14,#23,#0a,#21,#14
.lf9be equ $ + 1
	db #ff,#85,#e0,#32,#00,#a0,#36,#a0
	db #80,#2a,#0a,#2a,#0a,#28,#1e,#2a
	db #0a,#2a,#0a,#28,#32,#2a,#0a,#2a
.lf9d9 equ $ + 4
	db #0a,#28,#14,#ff,#83,#0e,#0a,#0e
	db #0a,#81,#0d,#0a,#83,#0e,#0a,#ff
.lf9e5
	db #83,#0e,#1e,#0e,#1e,#10,#1e,#10
.lf9ef equ $ + 2
	db #1e,#ff,#83,#0e,#0a,#10,#0a,#10
.lf9f9 equ $ + 4
	db #0a,#10,#0a,#ff,#87,#21,#0a,#21
	db #0a,#21,#0a,#21,#0a,#21,#14,#21
	db #0a,#23,#14,#25,#3c,#25,#0a,#25
	db #14,#25,#14,#28,#14,#25,#14,#23
	db #1e,#21,#1e,#25,#1e,#23,#28,#ff
.lfa1d
	db #80,#93,#28,#0a,#28,#0a,#28,#0a
	db #92,#2a,#14,#90,#87,#2a,#28,#25
	db #0a,#25,#0a,#28,#14,#25,#0a,#28
	db #14,#25,#0a,#23,#0a,#21,#0a,#23
	db #14,#25,#0a,#23,#14,#21,#0a,#1e
.lfa47 equ $ + 2
	db #46,#ff,#87,#25,#0a,#23,#0a,#21
	db #0a,#23,#14,#25,#0a,#23,#1e,#21
	db #0a,#1e,#3c,#28,#0a,#28,#0a,#2a
	db #8c,#26,#0a,#26,#0a,#25,#14,#ff
.lfa65
	db #83,#09,#0a,#09,#0a,#07,#0a,#07
	db #0a,#04,#0a,#04,#0a,#07,#0a,#09
	db #14,#09,#0a,#07,#0a,#07,#0a,#04
	db #0a,#05,#0a,#05,#0a,#0c,#14,#ff
.lfa85
	db #80,#e0,#09,#00,#50,#36,#50,#ff
.lfa8d
	db #80,#c0,#05,#00,#28,#06,#28,#ff
.lfa95
	db #80,#e0,#05,#00,#28,#36,#28,#ff
.lfa9d
	db #86,#e0,#09,#00,#ff,#23,#0a,#20
.lfaac equ $ + 7
	db #0a,#1e,#0a,#1b,#0a,#bf,#ff,#a0
	db #0a,#87,#1e,#0a,#1e,#0a,#1c,#14
.lfab6 equ $ + 1
	db #ff,#86,#e0,#14,#00,#ff,#23,#05
	db #23,#05,#20,#05,#20,#05,#1e,#05
	db #1e,#05,#1b,#05,#1b,#05,#bf,#ff
.lfacd
	db #0f,#0f,#0f,#0d,#08,#06,#05,#04
	db #03,#01,#82,#83,#83,#89,#90,#99
.lfadd
	db #0f,#0d,#07,#04,#03,#02,#02,#01
	db #01,#82,#85,#88,#89,#9c,#ae,#cb
.lfaed
	ld b,#f4
	out (c),c
	ld b,h
	out (c),d
	out (c),e
	ld b,#f4
	out (c),a
	ld b,h
	out (c),l
	out (c),e
	ret
;
.game_name
	db "Mask",0
.game_year
	db "1987",0
.game_publisher
	db "Gremlin Graphics",0
.music_author
	db "Ben Daglish",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
